projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
35ad741
)
Update safe-chars of mule-utf-8,
author
Dave Love
<fx@gnu.org>
Thu, 5 Dec 2002 16:55:25 +0000
(16:55 +0000)
committer
Dave Love
<fx@gnu.org>
Thu, 5 Dec 2002 16:55:25 +0000
(16:55 +0000)
mule-utf-16-le, mule-utf-16-be.
lisp/international/utf-8-subst.el
patch
|
blob
|
history
diff --git
a/lisp/international/utf-8-subst.el
b/lisp/international/utf-8-subst.el
index 6049e6a09fbf452e39b3aa2c3a2baa75471effc2..8e5b4affe8c5b7ce3063f0b1264c8e212e4850fd 100644
(file)
--- a/
lisp/international/utf-8-subst.el
+++ b/
lisp/international/utf-8-subst.el
@@
-20144,5
+20144,13
@@
(#x9F9D ?
\e
$BcT
\e
(B)
(#x9FA0 ?
\e
$Bs~
\e
(B)))
+(let ((tab (make-char-table 'translation-table)))
+ (maphash (lambda (k v)
+ (aset tab k v))
+ ucs-mule-cjk-to-unicode)
+ (register-char-codings 'mule-utf-8 tab)
+ (register-char-codings 'mule-utf-16-be tab)
+ (register-char-codings 'mule-utf-16-le tab))
+
(provide 'utf-8-subst)
;;; utf-8-subst.el ends here